home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / pctj8309.arc / REBOOT.BAS < prev    next >
BASIC Source File  |  1984-01-23  |  415b  |  7 lines
  1. 1000 '  Cold reboot program - full reboot with memory test
  2. 1010 DEF SEG = &H40             'define segment for flag at 0040:0072
  3. 1020 POKE &H72,0                'poke value <>34h into flag location
  4. 1030 DEF SEG = &HF000           'define segment for machine language call
  5. 1040 COLDBOOT = &HE05B          'define machine language call location and
  6. 1050 CALL COLDBOOT              '  execute call at f000:e05b
  7.